Public Class ConnectionString
    'Public Shared _connection_string As String = Nothing
    Public Shared _username As String = Nothing
    Public Shared _privilege_id As Integer = Nothing
    Public Shared _citizen_id As String = Nothing
    Public Shared _organization_id As String = Nothing
    Public Shared _organization_name_tha As String = Nothing
    Public Shared _pwd As String = Nothing

    Private Shared _frmLoadingForm As frmLoadingForm

    Public Shared Sub ShowLoadingForm()
        _frmLoadingForm = New frmLoadingForm
    End Sub

    'Public Shared Sub ShowLoadingForm(ByVal method_name As String)
    '    _frmLoadingForm = New frmLoadingForm(method_name)
    'End Sub

    Public Shared Sub TerminateLoadingForm()
        _frmLoadingForm.Terminate()
    End Sub


    Public Shared Sub TerminateAllLoadingForm()
        While _frmLoadingForm.IsBusy
            _frmLoadingForm.Terminate()
        End While
    End Sub

    'Public Shared Property m_frmLoadingForm() As frmLoadingForm
    '    Get
    '        If _frmLoadingForm IsNot Nothing Then
    '            Return _frmLoadingForm
    '        Else
    '            _frmLoadingForm = New frmLoadingForm()
    '            Return _frmLoadingForm
    '        End If

    '    End Get
    '    Set(ByVal value As frmLoadingForm)
    '        _frmLoadingForm = value
    '    End Set
    'End Property


End Class
